From: Richard M. Stallman Date: Thu, 25 Mar 1993 03:40:35 +0000 (+0000) Subject: (describe-function): Add blank line above doc string. X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~96700 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=cdd672cc5a5a902592922f6eb735b0b378d0d9d6;p=emacs.git (describe-function): Add blank line above doc string. --- diff --git a/lisp/help.el b/lisp/help.el index 5cf31dfeb78..a067e23e0f6 100644 --- a/lisp/help.el +++ b/lisp/help.el @@ -304,7 +304,8 @@ C-w print information on absence of warranty for GNU Emacs." (t ""))) (terpri) (if (documentation function) - (princ (documentation function)) + (progn (terpri) + (princ (documentation function))) (princ "not documented")) (cond ((byte-code-function-p def) (save-excursion